home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual Foxpro 6.0 (Ent. Edition) / Vf6ent Extractor.EXE / API / SAMPLES / FOXTLIB / FOXTLIB.ODL < prev    next >
Encoding:
Microsoft Object Description Language  |  1998-05-26  |  2.4 KB  |  74 lines
  1. // foxtlib.odl : type library source for OLE Control project.
  2.  
  3. // This file will be processed by the Make Type Library (mktyplib) tool to
  4. // produce the type library (foxtlib.tlb) that will become a resource in
  5. // foxtlib.ocx.
  6.  
  7. #include <olectl.h>
  8.  
  9. [ uuid(22852EE8-B01B-11CF-B826-00A0C9055D9E), version(1.0),
  10.   helpstring("Visual FoxPro TypeLib Info Control"), control ]
  11. library FOXTLIBLib
  12. {
  13.     importlib(STDOLE_TLB);
  14.     importlib(STDTYPE_TLB);
  15.  
  16.     //  Primary dispatch interface for CFoxtlibCtrl
  17.  
  18.     [ uuid(22852EE9-B01B-11CF-B826-00A0C9055D9E),
  19.       helpstring("Dispatch interface for Visual FoxPro TypeLib Info Control"), hidden ]
  20.     dispinterface _DFoxtlib
  21.     {
  22.         properties:
  23.             // NOTE - ClassWizard will maintain property information here.
  24.             //    Use extreme caution when editing this section.
  25.             //{{AFX_ODL_PROP(CFoxtlibCtrl)
  26.             //}}AFX_ODL_PROP
  27.  
  28.         methods:
  29.             // NOTE - ClassWizard will maintain method information here.
  30.             //    Use extreme caution when editing this section.
  31.             //{{AFX_ODL_METHOD(CFoxtlibCtrl)
  32.             [id(1)] long TLLoadTypeLib(BSTR szFileName);
  33.             [id(2)] long TLRelease(long pTypeInfo);
  34.             [id(3)] long TLGetTypeInfoCount(long pTypeInfo);
  35.             [id(4)] long TLGetTypeAttr(long pTypeInfo, BSTR szArrName);
  36.             [id(5)] long TLGetTypeInfo(long pTypeInfo,long nIndex);
  37.             [id(6)] long TLGetDocumentation(long pTypeInfo, BSTR szArrName, long nIndex);
  38.             [id(7)] long TIGetNames(long pTypeInfo, BSTR szArrName, long nMemId);
  39.             [id(8)] long TIGetFuncDesc(long pTypeInfo, BSTR szArrName, long nIndex, BSTR szParmsArr);
  40.             [id(9)] long test(VARIANT* p1);
  41.             [id(10)] long TIGetVarDesc(long pTypeInfo, BSTR szArrName, long nIndex);
  42.             //}}AFX_ODL_METHOD
  43.     };
  44.  
  45.     //  Event dispatch interface for CFoxtlibCtrl
  46.  
  47.     [ uuid(22852EEA-B01B-11CF-B826-00A0C9055D9E),
  48.       helpstring("Event interface for Visual FoxPro TypeLib Info Control") ]
  49.     dispinterface _DFoxtlibEvents
  50.     {
  51.         properties:
  52.             //  Event interface has no properties
  53.  
  54.         methods:
  55.             // NOTE - ClassWizard will maintain event information here.
  56.             //    Use extreme caution when editing this section.
  57.             //{{AFX_ODL_EVENT(CFoxtlibCtrl)
  58.             //}}AFX_ODL_EVENT
  59.     };
  60.  
  61.     //  Class information for CFoxtlibCtrl
  62.  
  63.     [ uuid(22852EE3-B01B-11CF-B826-00A0C9055D9E),
  64.       helpstring("Visual FoxPro TypeLib Info Control"), control ]
  65.     coclass Foxtlib
  66.     {
  67.         [default] dispinterface _DFoxtlib;
  68.         [default, source] dispinterface _DFoxtlibEvents;
  69.     };
  70.  
  71.  
  72.     //{{AFX_APPEND_ODL}}
  73. };
  74.